home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 06 - 1990 / 06.07 Jul 90 / Commando Programming ƒ / Rezscripts / CmdoRect.R next >
Encoding:
Text File  |  1988-07-28  |  1.8 KB  |  66 lines  |  [TEXT/MPS ]

  1. /* File CmdoRect.R */
  2. /* W. Powell, 1988 */
  3. /* Include File to generate commando input for rectangles */
  4.  
  5. /* This file is meant to be included in other Rez files
  6.  * This file contains 5 Commando control items
  7.  * Parameters RLeft, RTop, RTit, RDep are to be defined in
  8.  * the calling source file.
  9.  *    RTop    = vertical component of top of the RECT dialog area
  10.  *    RLeft    = horizontal component of left of RECT input area
  11.  *    RTit    = short title to describe rectangle
  12.  *    RDef    = a control list enclosed in one set of {}'s.
  13.  *                 The RECT input area has OR dependency on this 
  14.  *                set of controls.  Build more complicated 
  15.  *                dependency with dummy items.
  16.  */
  17.  
  18. #ifndef RTop
  19.     #printf ("### CmdoRect.R Error:\n")
  20.     #printf ("### Variable RTop (vert. coord of top left) undefined\n")
  21. #endif
  22. #ifndef RLeft
  23.     #printf ("### CmdoRect.R Error:\n")
  24.     #printf ("### Variable RLeft (horiz. coord. of top left) undefined\n")
  25. #endif
  26. #ifndef RDep
  27.     #printf ("### CmdoRect.R Error:\n")
  28.     #printf ("### Variable RDep (list of control dependencies) undefined\n")
  29. #endif
  30. #ifndef RTit
  31.     #define RTit ""
  32. #endif
  33.  
  34. OR { RDep }, RegularEntry {
  35.     "Top",
  36.     {RTop+7,RLeft+10,RTop+23,RLeft+50},
  37.     {RTop+27,RLeft+10,RTop+43,RLeft+50},
  38.     "",keepCase,"-t",
  39.     "Top coordinate of rectangle" },
  40. OR { RDep }, RegularEntry {
  41.     "Left",
  42.     {RTop+7,RLeft+60,RTop+23,RLeft+100},
  43.     {RTop+27,RLeft+60,RTop+43,RLeft+100},
  44.     "",keepCase,"-l",
  45.     "Left coordinate of rectangle" },
  46. OR { RDep }, RegularEntry {
  47.     "Bottom",
  48.     {RTop+7,RLeft+106,RTop+23,RLeft+156},
  49.     {RTop+27,RLeft+110,RTop+43,RLeft+150},
  50.     "",keepCase,"-b",
  51.     "Bottom coordinate of rectangle" },
  52. OR { RDep }, RegularEntry {
  53.     "Right",
  54.     {RTop+7,RLeft+162,RTop+23,RLeft+200},
  55.     {RTop+27,RLeft+160,RTop+43,RLeft+200},
  56.     "",keepCase,"-r",
  57.     "Right coordinate of rectangle" },
  58. NotDependent {}, TextBox {
  59.     gray,
  60.     {RTop,RLeft,RTop+51,RLeft+210},
  61.     RTit
  62.     },
  63.     
  64. /* End of file CmdoRect.R */
  65.     
  66.